[LegacyColorValue = true]; 

{TSM Blau Dbl Smoothing: Blau's double smoothing of momentum
  Copyright 1999, P.J.Kaufman. All rights reserved. }

	input:	Mlength(1),length1(40), length2(5);
	var:		TSMBDSm(0);

	TSMBDSm = TSMBlauDblSmoothing(close,Mlength,length1,length2);
	plot1 (TSMBDSm,"TSMBDSm");